Câu 15. Trong câu lệnh lặp for i:=2 to 100 do begin  end; câu lệnh ghép được thực hiện bao nhiêu lần (hay bao nhiêu vòng lặp được thực hiện)?

A. 102             B. 101                         C. 100             D. 99

Câu 16. Xem ví dụ sau trong pascal:

Uses crt; Var i:integer;       

Begin

            Clrscr; I:=1; while i < 14 do begin Writeln(‘0’); i := i+1; End; Readln; End.

Ví dụ trên ghi ra màn hình bao nhiêu chữ số 0?

A. 14;              B. 13;              C. 15;                          D. 16;

Câu 17. điều kiện trong câu lệnh lặp với số lần chưa biết trước thường là :

A. Phép gán    B. Câu lệnh đơn          C. Câu lệnh ghép        D. Phép so sánh

Câu 18. câu lệnh lặp For i:=1 to 5 do Writeln(‘Day la lan lap thu ‘,i); sẽ in ra màn hình 5 dòng chữ trong đó dòng thứ 3 có nội dung là:

A. Day la lan lap thu i                         B. Day la lan lap thu, i

C. Day la lan lap thu 3                        D. Day la lan lap thu , 3

I. PHẦN LÍ THUYẾT

câu 1:cho đoạn chương trình sau:

S:=0;

For i:= 1 to 6 do S:=S+i;

Tính giá trị của S?

II. PHẦN BÀI TẬP:

câu 1: Viết chương trình tính tích của 10 số tự nhiên đầu tiên.

Câu 2: Hãy phát biểu sự khác biệt giữa câu lệnh lặp với số lần lặp cho trước và câu lệnh lặp với số

lần lặp chưa biết trước.

Câu 3: Hãy tìm hiểu đoạn chương trình Pascal sau đây và cho biết với đoạn lệnh đó chương trình

thực hiện bao nhiêu vòng lặp?

S:=1; n:=0;

While S <=10 do

Begin

n:=n+1;

S:=S+n;

End;